MacWorld 1998 June/Macworld (1998-06).dmg/Shareware World/Utilities/Video/MVEMVC/MyVidEditor 2.1/Scripts Folder/Compress a movie Script

Text File | 1998-01-30 | 606 b | 17 lines | [TEXT/ToyS]

tell application "MyVidEditor©"
    activate
    set i to 1
    repeat while Select setting i
        -- Select setting will return false IF your "i" value is wrong - so once there are no more settings, it stops
        copy ("Part 2 HD:crap test " & i as string) to crappyname
        -- this "copy" just numbers each movie differently
        with timeout of 100000 seconds
            -- this "timeout of 100000" prevents a timeout error being generated during long compressions
            if Compress movie file "Part 2 HD:crap test" to movie file crappyname then
                set i to i + 1
            else
                set i to 500
            end if
        end timeout
    end repeat
end tell